#include<bits/stdc++.h>
#define ll long long
using namespace std;
int n,k;
int a[105];
int cnt;
int cntt[105];
struct node{
    int tt[105];
    bool operator<(const node &rhs)const
    {
        for(int i=1;i<=k;i++)
        {
            if(tt[i]<rhs.tt[i])
            {
                return true;
            }
            if(tt[i]>rhs.tt[i])
            {
                return false;
            }
        }
        return false;
    }
}start;
map<node,ll>f[105];
/*void dfs(int now,int sum)
{
    if(sum>100)
    {
        return;
    }
    if(now==n)
    {
        cnt++;
        cntt[sum]++;
        return;
    }
    for(int i=a[now-1];i<=100/n;i++)
    {
        a[now]=i;
        dfs(now+1,sum+i);
    }
}*/
void solve(int now,node x,ll value,ll addvalue,int add,int flag,int key)
{
    /*for(int i=1;i<=k;i++)
    {
        cout<<x.tt[i]<<" ";
    }
    cout<<endl;*/
    if(now==k+1&&add==0)
    {
        if(f[key].find(x)==f[key].end())
        {
            f[key][x]=value;
        }
        else
        {
            f[key][x]=min(f[key][x],value);
        }
        //cout<<"!!"<<endl;
        return;
    }
    if(add<0)
    {
        return;
    }
    if(now==k+1)
    {
        return;
    }
    if(!flag||x.tt[now-1]<=x.tt[now])
    {
        solve(now+1,x,value,addvalue,add,0,key);
    }
    if(x.tt[now]==0)
    {
        value-=addvalue;
    }
    x.tt[now]++;
    if(x.tt[now]>n/k)
    {
        return;
    }
    if(x.tt[now]==n/k)
    {
        value+=addvalue;
    }
    solve(now+1,x,value,addvalue,add-1,1,key);
}
int main()
{
    freopen("diyiti.in","r",stdin);
    freopen("diyiti.out","w",stdout);
    cin>>n>>k;
    for(int i=1;i<=n;i++)
    {
        cin>>a[i];
    }
    sort(a+1,a+n+1);
    f[1][start]=0;
    int r=0;
    for(int l=1;l<=n;l=r+1)
    {
        r=l;
        while(r<=n&&a[r+1]==a[r])
        {
            r++;
        }
        //cout<<(r-l+1)<<endl;
        for(map<node,ll>::iterator it=f[l].begin();it!=f[l].end();it++)
        {
            //cout<<"~~"<<l<<" "<<r<<" "<<(*it).second<<endl;
            solve(1,(*it).first,(*it).second,a[l],r-l+1,0,r+1);
        }
    }
    map<node,ll>::iterator it=f[n+1].begin();
    if(f[n+1].size()==0)
    {
        cout<<-1<<endl;
        return 0;
    }
    cout<<(*it).second<<endl;
    /*for(int i=1;i<=100;i++)
    {
        n=i;
        cnt=0;
        memset(cntt,0,sizeof(cntt));
        dfs(1,0);
        cout<<"::"<<i<<" "<<cnt<<endl;
        int tt=0;
        for(int j=1;j<=100;j++)
        {
            tt+=cntt[j]*cntt[j+1];
        }
        cout<<"!!"<<tt<<endl;
    }*/
    return 0;
}
